(Fexpand_file_name): When simplifying /foo/.., keep the initial slash.

diff --git a/src/fileio.c b/src/fileio.c
index a05a72e97bd80c24db39796a0791b1c228b8f951..f5a800f6c16697d8521aac9b9b6e4b7feb952df4 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -1386,6 +1386,8 @@ See also the function `substitute-in-file-name'.")
        {
          while (o != target && (--o) && !IS_DIRECTORY_SEP (*o))
            ;
+         if (o == target && IS_ANY_SEP (*o))
+           ++o;
          p += 3;
        }
       else